home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Pascal Super Library
/
Pascal Super Library (CW International)(1997).bin
/
LIBRARY
/
CMPLTPAS
/
GAMEBORD.PAS
< prev
next >
Wrap
Pascal/Delphi Source File
|
1988-08-01
|
1KB
|
33 lines
{--------------------------------------------------------------}
{ GAMEBORD }
{ }
{ Machine-code joystick support unit }
{ }
{ by Jeff Duntemann }
{ Turbo Pascal V5.00 }
{ Last update 8/1/88 }
{ }
{ This is the unit body for a unit that actually consists of }
{ the two assembly language routines in file GAMER.ASM. }
{ }
{ From: COMPLETE TURBO PASCAL 5.0 by Jeff Duntemann }
{ Scott, Foresman & Co., Inc. 1988 ISBN 0-673-38355-5 }
{--------------------------------------------------------------}
UNIT GameBord;
INTERFACE
FUNCTION Button(StickNumber,ButtonNumber : Integer) : Boolean;
PROCEDURE Stick(StickNumber : Integer;
VAR X : INTEGER;
VAR Y : INTEGER);
IMPLEMENTATION
{$L GAMER}
FUNCTION Button; EXTERNAL;
PROCEDURE Stick; EXTERNAL;
END.